home *** CD-ROM | disk | FTP | other *** search
Text File | 1990-04-03 | 1.6 KB | 50 lines | [TEXT/MACv] |
- { Prompt for the the input and output directories }
- {$SETC InputFolder = '$Where is the input folder?'}
- {$SETC OutputFolder = '$Place converted sources in:'}
-
- {$SETC SrcApp = InputFolder}
-
- { These are the standard USES clause changes, copied from "MacApp.Script" }
-
- { Unit dependencies: any unit that USES the first unit in each $DEPEND directive
- must also USE the subsequent units. }
-
- {$DEPEND ULoMem SysEqu Devices}
- {$DEPEND UMacAppUtilities Traps ULoMem}
- {$DEPEND UViewCoords UMacAppUtilities}
- {$DEPEND UMemory UPatch}
- {$DEPEND UMacApp UObject UViewCoords UMemory UFailure UMenuSetup UList}
- {$DEPEND UInspector UObject UList}
- {$DEPEND UDialog UList UAssociation UMacApp UTEView}
- {$DEPEND UPrinting PrintTraps}
-
- { Additional USES requirements }
-
- {$USES UDialog UList UAssociation}
- {$USES UInspector UObject UList}
- {$USES UFailure UMacAppUtilities UDebug}
-
- { Any uses of these units should be removed }
- {$NOUSES UFailure UMacApp}
- {$NOUSES UMacApp UInspector}
-
- { Remove USES of the standard Mac interfaces which are built in to THINK Pascal. }
-
- {$NOUSES * Controls Desk Devices Dialogs DiskInit Errors Events Files Fonts Lists Memory Menus}
- {$NOUSES * OSEvents OSUtils Packages Quickdraw Resources Scrap SCSI SegLoad TextEdit ToolUtils}
- {$NOUSES * Types Windows}
-
- {$NOUSES * MemTypes Quickdraw OSIntf ToolIntf PackIntf}
-
- { Tell the converter where to place the converted sources }
- {$OUTPUT OutputFolder}
-
- { Default to the specified input folder for unqualified file names }
- {$DIR InputFolder}
-
- { Look for includes in the specified input folder }
- {$INCLUDES InputFolder}
-
- { Process the source files from the input folder }
- {$INPUT InputFolder}
-